10 POKE53281,7:POKE53280,2:PRINT"[147]"CHR$(14):REM BILDSCHIRM INITIALISIEREN
11 REM
12 REM KOORDINATEN
13 REM
14 AX=10:AY=20
15 CX=20:CY=10
16 BX=CX:BY=AY
17 DX=AX:DY=CY
18 REM
20 POKE211,AX:POKE214,AY:SYS58732:PRINT"[173]":POKE211,BX:POKE214,BY:SYS58732
21 PRINT"[189]":POKE211,CX:POKE214,CY:SYS58732:PRINT"[174]":POKE211,DX:POKE214,DY
22 SYS58732:PRINT"[176]"
33 REM
34 FORG=AX+1TOBX-1:POKE211,G:POKE214,AY:SYS58732:PRINT"[192]":POKE211,G:POKE214,CY
35 SYS58732:PRINT"[192]":NEXT:FORG=DY+1TOAY-1:POKE211,AX:POKE214,G:SYS58732
36 PRINT"[221]":POKE211,BX:POKE214,G:SYS58732:PRINT"[221]":NEXT
37 REM
38 POKE211,12:POKE214,14:SYS58732:PRINT"[215]INDOWS":PRINTTAB(12)"AUCH IN"
39 PRINTTAB(12)"[194][193][211][201][195] !"
40 REM
41 GETA$:IFA$=""THEN41
42 PRINT"[147]":LIST